home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Apple Reference & Presen…tion Library 2 (Reseller)
/
Apple R&P Lib Reseller v2.0.iso
/
3-Demos
/
Third Party Demos
/
Networking
/
Timbuktu⁄Remote
/
Timbuktu⁄Remote™ Tour
/
Timbuktu_Remote™ Tour
/
card_5366.txt
< prev
next >
Wrap
Text File
|
1989-07-19
|
9KB
|
396 lines
-- card: 5366 from stack: in
-- bmap block id: 5420
-- flags: 0000
-- background id: 2758
-- name:
----- HyperTalk script -----
on OpenCard
global skipAnimate
if (skipAnimate is true) or (the optionKey is down) then
put false into skipAnimate
exit openCard
end if
wait 1 secs
choose browse tool
set the cursor to watch
set loc of card button SEMenu to 74,130 --reset its location
show card button "SEMenu"
wait 80 ticks
hide card button "SEMenu"
show card button "TB2R"
set loc of card button "Packet" to 54,185
show card button "Packet"
wait 5
set loc of card button "Packet" to 54,185
wait 5
set loc of card button "Packet" to 48,192
wait 5
set loc of card button "Packet" to 46,203
wait 5
set loc of card button "Packet" to 47,214
wait 5
set loc of card button "Packet" to 47,231
Blink "Blink1", 1
set loc of card button "Packet" to 46,246
wait 5
set loc of card button "Packet" to 47,259
wait 5
set loc of card button "Packet" to 50,271
wait 5
set loc of card button "Packet" to 60,273
wait 5
set loc of card button "Packet" to 76,273
wait 5
set loc of card button "Packet" to 90,273
wait 5
set loc of card button "Packet" to 109,273
wait 5
set loc of card button "Packet" to 128,273
wait 5
set loc of card button "Packet" to 144,273
wait 5
set loc of card button "Packet" to 156,273
wait 5
set loc of card button "Packet" to 156,260
wait 5
set loc of card button "Packet" to 156,242
wait 5
set loc of card button "Packet" to 156,226
wait 5
set loc of card button "Packet" to 165,225
wait 5
set loc of card button "Packet" to 175,224
wait 5
set loc of card button "Packet" to 184,223
wait 5
set loc of card button "Packet" to 191,223
wait 5
set loc of card button "Packet" to 187,228
wait 5
set loc of card button "Packet" to 182,229
wait 5
set loc of card button "Packet" to 176,234
wait 5
set loc of card button "Packet" to 185,234
wait 5
set loc of card button "Packet" to 193,234
wait 5
set loc of card button "Packet" to 204,231
wait 5
set loc of card button "Packet" to 212,229
wait 5
set loc of card button "Packet" to 224,228
wait 5
set loc of card button "Packet" to 232,228
wait 5
set loc of card button "Packet" to 239,226
wait 5
set loc of card button "Packet" to 246,227
wait 5
set loc of card button "Packet" to 246,237
wait 5
set loc of card button "Packet" to 246,246
wait 5
set loc of card button "Packet" to 246,257
wait 5
set loc of card button "Packet" to 246,269
wait 5
set loc of card button "Packet" to 246,273
wait 5
set loc of card button "Packet" to 261,273
wait 5
set loc of card button "Packet" to 281,273
wait 5
set loc of card button "Packet" to 299,272
wait 5
set loc of card button "Packet" to 317,272
wait 5
set loc of card button "Packet" to 337,272
wait 5
set loc of card button "Packet" to 353,272
wait 5
set loc of card button "Packet" to 369,272
wait 5
set loc of card button "Packet" to 381,269
wait 5
set loc of card button "Packet" to 382,257
wait 5
set loc of card button "Packet" to 382,246
wait 5
set loc of card button "Packet" to 382,227
Blink "Blink2",1
set loc of card button "Packet" to 382,212
wait 5
set loc of card button "Packet" to 382,197
wait 5
set loc of card button "Packet" to 378,186
wait 5
set loc of card button "Packet" to 371,185
hide card button "Packet"
hide card button "TB2R"
set style of card button Blink3 to transparent
set hilite of card button Blink3 to true
show card button "Blink3"
wait 10
set hilite of card button Blink3 to false
lock screen
set style of card button Blink3 to opaque
show card button "Chart1"
show card button "Chart2"
unlock screen
wait 1 secs
put 115 into x1
put 143 into y1
put 348 into x2
put 140 into y2
set loc of card button Curs1 to x1,y1
set loc of card button Curs2 to x2,y2
lock screen
show card button Curs1
show card button Curs2
unlock screen
repeat 12 times
subtract 2 from x1
subtract 2 from y1
subtract 2 from x2
subtract 2 from y2
lock screen
set loc of card button Curs1 to x1,y1
set loc of card button Curs2 to x2,y2
unlock screen
end repeat
repeat 10 times
subtract 2 from x1
subtract 2 from x2
lock screen
set loc of card button Curs1 to x1,y1
set loc of card button Curs2 to x2,y2
unlock screen
end repeat
set loc of card button SEMenu to 74,130 --reset its location
set loc of card button IIMenu to 306,127 --reset its location
lock screen
hide card button Curs1
hide card button Curs2
show card button SEMenu
show card button IIMenu
unlock screen
put 74 into x1
put 306 into x2
wait 1 secs
repeat 4 times
add 7 to x1
add 7 to x2
lock screen
set loc of card button SEMenu to x1,130
set loc of card button IIMenu to x2,127
unlock screen
wait 1 secs
end repeat
lock screen
hide card button SEMenu
hide card button IIMenu
unlock screen
end OpenCard
on closeCard
hide card button "Blink3"
hide card button "Chart1"
hide card button "Chart2"
end closeCard
-- part 13 (button)
-- low flags: 80
-- high flags: 0001
-- rect: left=63 top=115 right=145 bottom=113
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Blink3
-- part 2 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=439 top=318 right=335 bottom=506
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Back
----- HyperTalk script -----
on mouseUp
visual wipe right
go prev card
end mouseUp
-- part 6 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=61 top=113 right=147 bottom=95
-- title width / last selected line: 0
-- icon id / first selected line: 28174 / 28174
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Chart1
-- part 7 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=94 top=113 right=147 bottom=117
-- title width / last selected line: 0
-- icon id / first selected line: 16050 / 16050
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Chart2
-- part 9 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=366 top=219 right=241 bottom=399
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Blink2
-- part 11 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=31 top=219 right=241 bottom=64
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Blink1
-- part 8 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=364 top=178 right=192 bottom=378
-- title width / last selected line: 0
-- icon id / first selected line: 18934 / 18934
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Packet
-- part 12 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=439 top=296 right=314 bottom=506
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: More
----- HyperTalk script -----
on mouseUp
visual wipe left
go next card
end mouseUp
-- part 14 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=93 top=113 right=147 bottom=111
-- title width / last selected line: 0
-- icon id / first selected line: 12262 / 12262
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: SEMenu
-- part 19 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=72 top=118 right=144 bottom=101
-- title width / last selected line: 0
-- icon id / first selected line: 1009 / 1009
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: TB2R
-- part 22 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=325 top=110 right=144 bottom=343
-- title width / last selected line: 0
-- icon id / first selected line: 12262 / 12262
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: IIMenu
-- part 23 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=65 top=113 right=125 bottom=77
-- title width / last selected line: 0
-- icon id / first selected line: 25899 / 25899
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Curs1
-- part 24 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=298 top=110 right=122 bottom=310
-- title width / last selected line: 0
-- icon id / first selected line: 25899 / 25899
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Curs2